home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / batchut / xecho11.zip / SETOKI.BAT < prev    next >
DOS Batch File  |  1988-10-04  |  3KB  |  117 lines
  1. rem set for okidata 84 printer
  2. if "%1"=="" goto help
  3. :loop
  4. if "%1"=="" goto exit
  5. for %%p in (initial INITIAL) do if "%1"=="%%p" goto init
  6. for %%p in (init INIT) do if "%1"=="%%p" goto init
  7. for %%p in (cpi CPI) do if "%1"=="%%p" goto cpi
  8. for %%p in (cpi10 CPI10 10) do if "%1"=="%%p" goto cpi10
  9. for %%p in (cpi12 CPI12 12) do if "%1"=="%%p" goto cpi12
  10. for %%p in (cpi17 CPI17 17) do if "%1"=="%%p" goto cpi17
  11. for %%p in (lpi LPI) do if "%1"=="%%p" goto lpi
  12. for %%p in (lpi6 LPI6 6) do if "%1"=="%%p" goto lpi6
  13. for %%p in (lpi8 LPI8 8) do if "%1"=="%%p" goto lpi8
  14. for %%p in (wide WIDE) do if "%1"=="%%p" goto wide
  15. for %%p in (tof TOF) do if "%1"=="%%p" goto tof
  16. for %%p in (lpp LPP) do if "%1"=="%%p" goto lpp
  17. for %%p in (draft DRAFT) do if "%1"=="%%p" goto draft
  18. for %%p in (nlq NLQ) do if "%1"=="%%p" goto nlq
  19. for %%p in (emphasized EMPHASIZED) do if "%1"=="%%p" goto emph
  20. for %%p in (thicker THICKER) do if "%1"=="%%p" goto thick
  21. for %%p in (normal NORMAL) do if "%1"=="%%p" goto normal
  22. for %%p in (unidirectional UNIDIRECTIONAL) do if "%1"=="%%p" goto uni
  23. for %%p in (bidirectional BIDIRECTIONAL) do if "%1"=="%%p" goto bi
  24. echo ERROR: unrecognised parameter: %1
  25. echo.
  26. goto help
  27. :done
  28. shift
  29. goto loop
  30. :cpi
  31. shift
  32. if "%1"=="10" goto cpi10
  33. if "%1"=="12" goto cpi12
  34. if "%1"=="17" goto cpi17
  35. echo ERROR: illegal value specified: %1
  36. echo (characters per inch not set)
  37. goto done
  38. :cpi10
  39. xecho \030\013>prn
  40. goto done
  41. :cpi12
  42. xecho \028\013>prn
  43. goto done
  44. :cpi17
  45. xecho \029\013>prn
  46. goto done
  47. :lpi
  48. shift
  49. if "%1"=="6" goto lpi6
  50. if "%1"=="8" goto lpi8
  51. echo ERROR: illegal value specified: %1
  52. echo (lines per inch not set)
  53. goto done
  54. :lpi6
  55. xecho \0276>prn
  56. goto done
  57. :lpi8
  58. xecho \0278>prn
  59. goto done
  60. :wide
  61. xecho \031>prn
  62. goto done
  63. :lpp
  64. shift
  65. xecho \027F%1\0275>prn
  66. goto done
  67. :tof
  68. xecho \0275>prn
  69. goto done
  70. :draft
  71. xecho \0270>prn
  72. goto done
  73. :nlq
  74. xecho \0271>prn
  75. goto done
  76. :emph
  77. xecho \027T>prn
  78. goto done
  79. :thick
  80. xecho \027H>prn
  81. goto done
  82. :normal
  83. xecho \027I>prn
  84. goto done
  85. :uni
  86. xecho \027O>prn
  87. goto done
  88. :bi
  89. xecho \027P>prn
  90. goto done
  91. :init
  92. xecho \027P\027I\0270\0276\030\027F00\0275\027D\027K\027M>prn
  93. goto done
  94. :help
  95. echo.
  96. echo Usage: SETOKI param1 param2 ...   where "params" can be:
  97. echo.
  98. echo        INITIAL or INIT         - sets printer to turn-on state
  99. echo        LPI6  or LPI 6  or  6   - set 6 lpi (lines per inch)
  100. echo        LPI8  or LPI 8  or  8   - set 8 lpi
  101. echo        CPI10 or CPI 10 or 10   - set 10 cpi (chars per inch)
  102. echo        CPI12 or CPI 12 or 12   - set 12 cpi (all "CPI" directives cause
  103. echo        CPI17 or CPI 17 or 17   - set 17 cpi  a carriage return)
  104. echo        WIDE                    - double width chars (cancelled by "CPI")
  105. echo        DRAFT                   - set draft printing
  106. echo        NLQ                     - set NLQ printing
  107. echo        EMPHASIZED              - double print lines for darker chars
  108. echo        THICKER                 - double print lines for thicker chars
  109. echo        NORMAL                  - cancel double printing of lines
  110. echo        UNIDIRECTIONAL          - uni-directional printing
  111. echo        BIDIRECTIONAL           - bi-directional printing
  112. echo        TOF                     - set top of form
  113. echo        LPP nn                  - set lines per page and top of form
  114. echo           ("nn" must be two decimal digits or results are unpredictable)
  115. echo.
  116. :exit
  117.